﻿Public Class Sach_CRT

    Private _Ten As String

    Public Property Ten() As String
        Get
            Return _Ten
        End Get
        Set(ByVal value As String)
            _Ten = value
        End Set
    End Property
    
    Private _TacGia As String

    Public Property TacGia() As String
        Get
            Return _TacGia
        End Get
        Set(ByVal value As String)
            _TacGia = value
        End Set
    End Property


    Private _MaTheLoai As Integer

    Public Property MaTheLoai() As Integer
        Get
            Return _MaTheLoai
        End Get
        Set(ByVal value As Integer)
            _MaTheLoai = value
        End Set
    End Property

    Public Sub New()

        MaTheLoai = 0
        Ten = ""
        TacGia = ""
    End Sub
End Class
